      LOGICAL         SPHR1,  SPHR2,  SPHR3,  SPHR4,  SPHR12, SPHR34,
     &                GCON1,  GCON2,  GCON3,  GCON4,  GCON12, GCON34,
     &                TKMP12, TKMP34, TCMP12, TCMP34
      COMMON /ERIAO/  IELCT1, IELCT2,
     &                NHKT1,  NHKT2, NHKT3, NHKT4,
     &                JMAX1,  JMAX2, JMAX3, JMAX4, JMAX12, JMAX34,
     &                JMXD1,  JMXD2, JMXD3, JMXD4, JMXD12, JMXD34,
     &                NTUV12, NTUV34,
     &                KHKT1,  KHKT2, KHKT3, KHKT4, KHKT12, KHKT34,
     &                KCKT1,  KCKT2, KCKT3, KCKT4, KCKT12, KCKT34,
     &                NPRF1,  NPRF2, NPRF3, NPRF4, NPRF12, NPRF34,
     &                NCTF1,  NCTF2, NCTF3, NCTF4, NCTF12, NCTF34,
     &                ICMAT1, ICMAT2,ICMAT3,ICMAT4,
     &                NCNT12, NCNT34,
     &                NODS12, NODS34,KODS12, KODS34,
     &                NPPPP,  NPPCC, NCCPP, NCCCC, NPP12, NPP34,
     &                I12XYZ, I120(3),
     &                I34XYZ, I340(3),
     &                IHHBIT, IHCBIT, ICHBIT, ICCBIT,
     &                SPHR1,  SPHR2,  SPHR3,  SPHR4,  SPHR12, SPHR34,
     &                GCON1,  GCON2,  GCON3,  GCON4,  GCON12, GCON34,
     &                TKMP12, TKMP34, TCMP12, TCMP34
